From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 2 Apr 2007 09:16:36 +0000 (+0000)
Subject: (Fprin1_to_string): Use macro SPECPDL_INDEX.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~1182
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1daba991841a3ba574a0e64eae4d437b9f9c572a;p=emacs.git

(Fprin1_to_string): Use macro SPECPDL_INDEX.
---

diff --git a/src/print.c b/src/print.c
index 4110ef32407..533d0a82cc4 100644
--- a/src/print.c
+++ b/src/print.c
@@ -796,7 +796,7 @@ A printed representation of an object is text which describes that object.  */)
   Lisp_Object printcharfun;
   /* struct gcpro gcpro1, gcpro2; */
   Lisp_Object save_deactivate_mark;
-  int count = specpdl_ptr - specpdl;
+  int count = SPECPDL_INDEX ();
   struct buffer *previous;
 
   specbind (Qinhibit_modification_hooks, Qt);